home *** CD-ROM | disk | FTP | other *** search
/ Cine Live 70 / Cine Live 70.iso / pc / Data / Interface / bonuspere.k < prev    next >
Encoding:
Text File  |  2003-06-10  |  2.1 KB  |  90 lines

  1. module oRoot1 is cBox
  2. with 
  3.     Flags is $00000152; 
  4.     release Editor:
  5.         IOWindow is {$00000122,$0000002A,$00000228,$000003BD,$00000000,$00000000,$00000000,$00000000};
  6.         LayoutWindow is {$00000194,$00000030,$0000028F,$000001EF,$00000000,$00000000,$00000064,$00000000};
  7.     end;
  8.     Name is "Root"; 
  9.     Enabled is false; 
  10.     
  11.     Width is 800; Height is 600; 
  12.     
  13.     
  14.     Elements is [
  15.         oGENERIK22
  16.     ];
  17.     Events is [
  18.         cKeyboardEvent
  19.         with Test is IsSpace; 
  20.             Commands is [
  21.                 cRunCommand
  22.                 with Target is oGENERIK22; Mode is Toggle; end
  23.             ];
  24.         end,
  25.         cKeyboardEvent
  26.         with Value is "+"; 
  27.             Commands is [
  28.                 cSetVolumeCommand
  29.                 with Mode is ExecuteHigher; end
  30.             ];
  31.         end,
  32.         cKeyboardEvent
  33.         with Value is "-"; 
  34.             Commands is [
  35.                 cSetVolumeCommand
  36.                 with Flags is $00000004; Mode is ExecuteLower; end
  37.             ];
  38.         end,
  39.         cKeyboardEvent
  40.         with Value is "m"; 
  41.             Commands is [
  42.                 cRunCommand
  43.                 with Flags is $00000004; Mode is Toggle; Rewind is true; end
  44.             ];
  45.         end
  46.     ];
  47. end;
  48.  
  49. object oGENERIK22 is cMPEGMovie
  50. with 
  51.     Flags is $00000554; 
  52.     release Editor:
  53.         IOWindow is {$000000D9,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
  54.     end;
  55.     Name is "GENERIK2"; 
  56.     Cursor is oEmptyCursor; 
  57.     AdjustX is AlignToCenter; AdjustY is AlignToMiddle; 
  58.     Width is 800; Height is 600; 
  59.     
  60.     URL is "../Videos/bonuspere.mpg"; 
  61.     Events is [
  62.         cOnscreenEvent
  63.         with Flags is $00000004; 
  64.             Commands is [
  65.                 cRunCommand
  66.                 with Flags is $00000004; Target is oTargetSelf; Rewind is true; end
  67.             ];
  68.         end,
  69.         cMouseUpEvent
  70.         with Flags is $00000004; Flag is true; 
  71.             Commands is [
  72.                 cRunCommand
  73.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  74.                 cShowCommand
  75.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  76.                 cBrowseCommand
  77.                 with Flags is $00000004; URL is "Data/Interface/avant%20prem.k"; URLOption is GetDiskURL; end
  78.             ];
  79.         end,
  80.         cFinishedEvent
  81.         with Flags is $00000004; 
  82.             Commands is [
  83.                 cBrowseCommand
  84.                 with Flags is $00000004; URL is "Data/Interface/avant%20prem.k"; URLOption is GetDiskURL; end,
  85.                 cShowCommand
  86.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end
  87.             ];
  88.         end
  89.     ];
  90. end;